This command will set the specified 3D object to point in the same direction as the camera.

SET OBJECT TO CAMERA ORIENTATION Object Number

Object Number

Integer
The object number

This command does not return a value.

The object number must be specified using an integer value.

sync on : sync rate 0 : hide mouse:cls 0

ObjectNumber=1

SecondObject=2

load object "model.x",ObjectNumber

load object "model.x",SecondObject

rotate object ObjectNumber, 270, 0, 0

fix object pivot ObjectNumber

point object ObjectNumber,0,0,0

position object ObjectNumber, 0,0,0

while mouseclick()=0

if spacekey()=1 then move object ObjectNumber,1

if leftkey()=1 then turn object left ObjectNumber,1

if rightkey()=1 then turn object right ObjectNumber,1

if upkey()=1 then pitch object up ObjectNumber,1

if downkey()=1 then pitch object down ObjectNumber,1

if inkey$()="," then roll object left ObjectNumber,1

if inkey$()="." then roll object right ObjectNumber,1

if returnkey()=1

set object to object orientation ObjectNumber, SecondObject

set object to camera orientation ObjectNumber

position object ObjectNumber, 0,0,0

endif

sync

endwhile

delete object ObjectNumber

delete object SecondObject

end

BASIC3D Commands Menu
Index